#!/usr/bin/perl
use warnings;
use strict;

my $number = 34.6666666;
printf "%.2f", $number;
